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PREFACE 



The following Texas Instruments'' publications were used in the 
development of this application report and present additional 
information relative to process management in the Microprocessor 
Pascal System. These publications may be ordered from a TI Sales 
Office or authorized distribution. A complete listing of TI Sales 
Offices and Distributors is provided in the last section of this 
document. 



• The Microprocessor Pascal System User^s Manuals MP351 

• Software Development Handbook r MPA29 
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INTRODUCTION 



«>e Microprocessor ^^^'^fJlT^^^H^.lr. ''Z''Tli^Ts^ctrt7V^°^lTs 
System designed for ""^^et execution on a wi f microprocessor 

Microprocessor PSSCM, is ^,„;"|^"*' tensions as concurrent task 
:^:^^iiln/e%aSef inruf/outTurcrpab?irt?r!nd library utilities for 
microprocessor applications. 

^-^ '""r%rofide"^?e!!er"?Sgra.Srnreffirif^rt5?ougn:prJv^^ 

run-time environment. In the Mi?=fPf°^™°^^^^ n^-ocesses" . Action 
Zi^^^^flo^^^rdesf to^^of^ras SS^^tife Ts-^arel-orT priority 

^asis. 

^he execution of several processes in a sin^l^ system is termed 

S£i ? s:?ir;n'?jrdS?^ii^rni^ir^^pr^^^^^ 

thi^ lial to a large degree with asynchronous occurrences of events. 
T^l i^nlt^en ^t -1"^ ?Sir^?ne-tS-rne"^So??Lp^IaeLe"brtii:n 

ilfn??1lcat"n, IpluSation design, problem resolution, and solution 

reliability. 

Each, process in the Microprocessor Pascal run-time environment is in 

one of two states: 

1) ready to execute (This "ready" state includes active 
^ processes or the process that is currently executing.) 

^ 2) suspended (blocked) and waiting for a condition in the 
^ system to change (an event to occur) before it can 
become ready to execute. 

o.ooo««o«5 that are ready to execute reside in a ready queue. A 
p for y%chedulinrPol"y'is used to order processes as they are 
placed in queue. The most urgent process is P^f ®^^^^"^,^"^-,J^.^s| 

Ltive process. The last process in the ^"!^^„^^^^^^J^.J°^^.te 5h!s 
which is activated when no other process is in the ready state. This 
scheduling policy switches the attention of the processor from one 



(• 



.^au:jr fi-uwess CO cne next. Tnis switching is transparent to the user 
and results in an interleaving of process execution; all active 
processes appear to execute concurrently. 

Processes that are suspended, waiting for an event to occur, must be i 
notified when that event has taken place. The Executive Run-Time 
Support uses semaphores for that purpose. A semaphore can be 
envisioned as representing some event on which processes synchronize. 
Use of a semaphore can be loosely compared to the role of a signalman 
in a traffic situation. The signalman waves a flag (performs a signal) 
when Its clear for a car to proceed. A car waits for the signalman to 
wave his flag (performs a wait) before proceeding, in the above 
example, synchronization is based on the waving of a flag (event)* 
this synchronization provides for the sharing of a common resourc4 
U.e., the road). The scenario is now changed as follows: The 
signalman periodically waves his flag regardless of whether or not a 
car is waiting to proceed. Also, a counter keeps track of each 
occurrence of flag waving when there is no car to receive the signal. 
As a car approaches, it checks the counter. If the counter indicates 
that the signal was given, it proceeds, with the above modification, 
our example more closely resembles the action of a semaphore in the 
Microprocessor Pascal Environment. 

The information presented above briefly introduces tools used by the 
Executive Run Time Support to manage processes in the Microprocessor 
Pascal Environment. In the following sections, the scheduling of the 
processor ^nd process synchronization are discussed in more detail. 



SCHEDULING POLICY 



Vil 



^ «,e BKecua,e.Run-Ti»e_Support^(KTS, scheduUn. ^^^^ ^VslT 

'W assignment 



C 



the 
n-Time support j,kx=, »-':;"^'- ^;;iy' processes . Ready 

lVo^Zls\rf i^tTr^rinlll ^.^^ c^Urill'l<^L^del for execution 

according to priority. 

K process' priority is represented by a -"-fji^Sfs^Tfef ShlS'ts 
The greatest urgency is "presented by 0^ the least oy^^ ^^^ ^^^^ 
reserved for the IDLE Process. (IDLE is active onxy ^^ indicate 

processes in the system are °^!°'^^^:^^J"^tl (Interrupts can occur due 
ievice processes associated with intprupts.U^nt^ 

to a change m some reai wotx^i ovi^rntina lonqer than 

p?og?ammed to occur to Prevent a process from executing lo.g,^^^ ^^^ 

its time slice. Interrupt handlers are ^sualiy ^^ ^^ represent 

demand immediate execution.) Integer values gteat 

non-device processes. 

. scheduling decision is -^^^^^^^ Te.^^^lclls "^LSfnate^'"^? 
suspended Process becomes ready and a ^^^^y33P^,^.^ainess follows this 
becomes suspended. An ^^Pi^^^^^°".°ti?e process (at the top of the 
discussion of scheduling.) When ^® f^^J""^® ^^"^ed) the next process in 
queue) terminates ^^^^cution (or becomes suspended^ the ^^^^p ^^^^ .^ 

the queue becomes the active P^°^®^=-„^"^^^" .„ readv is given 
^^derfa by priority, f e„^S,-^-^,|irb"o»ef reldy^?? is inslrted 
the processor. When a suspenaea P^™ . newlv ready process 
in the ready queue based ^^^^s priority. The newly ^y^^F ^^ .^ 

preempts the <=^"f ^'/if i's mo?e urglntV Nin^levice processes that 
in the ready queue) if it is ™°f^^^|^^^^ processes of eqi^al priority. 

become ready are placed i," ?"^^® "^^^'^''the process that has been 
(When two processes have equal Priority, the pro ^^^^^ .^ 

ready the longest executes f^^|^-^?^7i?^ including the active 
^roc'ess! iZle fui^trates thftorKLg of Lis scheduling policy. 
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TIME 



TO 



ACTIVE 



T1 



T2 



T3 



T4 



T5 



I A; 16 I I B : 18 \ \ C : IDLE | 

\ A : 16 I I D : 16 } | B : 18 ] 

I D:16 I I B:18 I [ C . IDLE j 

I E;8 I { D:16 I | B : 18 | 



F:8 



I ^ « I I P^^« I 



E :8 



] [ 



D : 16 



] i B:18 I 



T6 m \ D : 16 I I A: 16 j j B : 18 "] 



C : IDLE 



C : IDLE 



B : 18 



C : IDLE 



C : IDLE 



COMMENTS 
A is active 



D becomes ready; is inserted 
in the ready queue 

A blocks and is suspended; 
D becomes active 



E (a device process) is inserted 
in the ready queue and pre- 
empts D. 



] [ 



C : IDLE 



1 F(a 



device process with 
a priority equal to E's) pre- 
empts E and becomes active 



F blocks and is suspended; 
E becomes active 



E blocks and is suspended; 

A becomes ready 

D is the active process 



FIGURE 1 -SCHEDULING POLICY 



In Figure 1 above, the ready queue is represented as a horizontal 
series of boxes. Each process (box) is labeled with a letter and a 
priority number. The first box in the ready queue is the active 
process. Time moves vertically from top to bottom. Comments to the 
right of each queue describe the action performed. 
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the RTS scheduling policy displayed in Figure 1 
"B" never becoming active. In fact, B will never 



The execution of 

results in process _ ^ 

become active unless all other processes in queue with greater "urgency 
become blocked or terminate execution. A process of higher urgency 
that becomes ready will always interrupt the (currently) active 
process. Once the more urgent process terminates (or becomes blocked) 
the previously active process will resume execution (unless another 
higher priority process becomes ready). This "preemptive scheduling 
with resumption" is designed for event-driven systems in which the 
event is some real-world occurrence that demands the immediate 
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attention of the computer. (Texas Instruments' Software Development 
Handbook discusses system design for monitoring and controlling 
"real-world" actions) . 

An RTS utility is available to swap non-device processes (with 
priority values greater than 15) in the ready queue. This "swap 
procedure" removes the first non-device process from the queue ana 
inserts it behind the last process with the same priority. Figure 2 
illustrates this. 



TIME 
TO 

T1 



ACTIVE 



\ A:2 I I B:2S | j C : 2S | 
\ A:2 j I C:25 I | B : 25 | 



I D : IDLe"^ 



D : IDLE 



] 



COMMENTS 
Aeall'tSWAP 

QuMM statu* 
SWAP 



FIGURE 2 - SWAP PROCEDURE 



A use of SWAP is to implement time slicing. SWAP is called to force a 
r^ non-device process that is active to relinquish the processor. This 
swapping of the active process prevents it from running longer than 
its user specified execution time (time slice) . 

fup to this point, the discussion has been concerned with the 
management of processes that are ready for execution. Processes become 
suspended or blocked because of a condition in the system. When 
another process signals that the condition has changed, the waiting 
process can become ready. The mechanics of this process 
synchronization are described in the next section. 
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PROCESS SYNCHRONIZATION 
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The semaphore is a Microprocessor Pascal language construct that is 6 
the fundamental mechanism for synchronization of processes via the 
Executive RTS, and can be thought of as representing some event on 
which processes synchronize. A process that is dependent on the 
occurence of an event can perform a WAIT to ensure that the event has 
occured before continuing execution. If the event has already 
occurred, the process executes; if not, it is suspended in that 
semaphore's queue until the event does occur. A SIGNAL operation 
performed on the associated semaphore allows a process to signal the 
occurence of an event. If some process is waiting for the event, it is 
made ready for execution; the process is removed from that semaphore's 
WAIT queue and inserted into the ready queue. If no process is 
waiting, the occurence of the event is recorded in the semaphore until 
a WAIT operation occurs for that event. (In both of these cases, the 
process that called SIGNAL remains in the active state.) The 
semaphores of the Executive RTS can be thought of as "counting" 
semaphores in that an occurence of an event is never lost, even if no 
process is waiting when the event occurs; a count is kept in the 
semaphore of all events that occurred (by SIGNAL) but were not 
received (by WAIT) . 



Microprocessor Pascal predefines semaphores as structures composed of 
two elements: 

1) A non-negative counter of unserviced events, and' 

2) A queue (possibly empty) of suspended processes. In 
this queue, processes are made ready on a first-in 
first-out (FIFO) basis. 



A semaphore is operated on by two primitive operations, WAIT and 
SIGNAL. These operations are implemented as routines, but are executed 
as though they were single machine instructions. Until these 
operations have completed, nothing must access the semaphore, the 
queues, or the operations themselves. This is assured when the 
interrupt mask is set to zero upon entry to the routines, and reset to 
its previous state upon exit. 

WAIT decrements the counter if it is non-zero; or if it is zero, 
suspends the currently active process (the process is moved from the 
ready queue to the semaphore queue) . SIGNAL increments the counter if 
the semaphore queue is empty; or if it is not empty, activates the 
first process in the queue (which will always be the process that has 
been in the queue the longest) . This activation consists of moving the 



first process from the semaphore queue to the ready queue. 

When semaphores are used to ensure exclusive access to two or more 
resources, extreme caution must be exercised to prevent a condition 
known as "deadlock". This takes place when a situation is created in 
Which two or more processes are suspended, awaiting a condition that 
cannot happen because there is no active process to cause the needed 
event to occur. 



For example, if two simultaneously executing processes 
require exclusive access to resources (X and Y) , 
sequence will result: 



(A and B) both 
the following 



A gets X 
B gets Y 



A requests Y 
B requests X 



In the above example, neither A nor B will ever resume execution, as A 
will be waiting for Y (which B has) and B will be waiting for X (which 
A has) . To prevent a situation such as this, either and/or both 
processes must check the availability of succeeding resources and, if 
unavailable, release those already acquired. 

(^ The listing on the following page is an example of process 

synchronization at work. This procedure receives a message from a 
mailbox and removes it from the queue. "M" is a pointer that (upon 
return from RCVMSG) points to the received message, and ADDRESSEE is a 
pointer to the mailbox from which the message is to be received. If no 

t messages exist at call time, the process is suspended until a message 
is entered into the mailbox queue (via SNDMSG) . 
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(* MAP, DEBUG *) 

PROGRAM MAILBOXES; 

CONST 

MSGSIZ = 80 y 

TYPE 

MSGPTR = @MSG? 
MBPTR = ©MAILBOX; 

MSG = RECORD 

NEXTMSG : MSGPTR; 

RESPONSE : SEMAPHORE; 

MSGSIZE : INTEGER; 

CMD : ( Rf W ) ; 

MSGTEXT : PACKED ARRAY ( .1 . .MSGSIZ. ) OF CHAR; 

END; 

MAILBOX = RECORD 

MAILPRESENT, MUTEX : SEMAPHORE; 
MSGHEAD, MSGTAIL : MSGPTR; 
END; 

PROCEDURE SIGNAL ( S : SEMAPHORE ) ; EXTERNAL; 
PROCEDURE WAIT ( S : SEMAPHORE ); EXTERNAL; 
PROCEDURE INITSEMAPHORE { VAR S : SEMAPHORE ; 

EXTERN Ar* • 
PROCEDURE TERMSEMAPHORE ( VAR S : SEMAPHORE ) ; EXTERNAL; 



VALUE 



INTEGER) ; 



I 



PROCEDURE SNDMSG ( M : MSGPTR ; ADDRESSEE : MBPTR ) ; FORWARD ; 

PROCEDURE RCVMSG ( VAR M : MSGPTR ; ADDRESSEE : MBPTR ) ; FORWAR 

PROCEDURE DELMSG ( M : MSGPTR ; ADDRESSEE : MBPTR ); FORWARD; 

PROCEDURE SNDMSG (* M : MSGPTR ; ADDRESSEE : MSPTR *) ; 

*. 



4 (* 

4 PURPOSE: 

4 ENTER A MESSAGE INTO A MAILBOX QUEUE. 

4 INPUTS: 

4 M : POINTER TO THE MESSAGE. 

4 ADDRESSEE : POINTER TO THE MAILBOX. 

4 PROCEDURES CALLED: 

4 WAIT, SIGNAL. 

4 OUTPUTS: 

4 NONE. 

4 EXCEPTIONS: 

4 NONE . 

4 HISTORY: 

4 04/08/79: ORIGINAL. 



4 
1 
1 
2 
3 
4 



BEGIN 

WITH M@ DO BEGIN 
NEXTMSG := NIL; 
WITH ADDRESSEES DO BEGIN 
WAIT (MUTEX ) ; 
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7 

8 
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10 

11 

11 

11 

11 





IF MSGHEAD <> NIL 

THEN MSGTAIL@ .NEXTMSG 
ELSE MSGHEAD :» M; 
MSGTAIL := M ; 
SIGNAL ( MAILPBESENT ) ; 
SIGNAL ( MUTEX ) ; 
END; (* WITH ADDRESSEE@ *) 
END; (* WITH M§ *) 
END; (* SNDMSG *) 



;= M 



4 ( 



PROCEDURE 



RCVMSG (* VAR M : MSGPTR ; ADDRESSEE : MBPTR *) ; 



4 
4 
4 
4 
4 
4 
4 
4 
4 
4 
4 
4 
4 
4 
4 
4 
1 
1 
2 
3 
4 
5 
6 
7 
8 
9 
9 
9 




PURPOSE: 

RECEIVE A MESSAGE FROM A MAILBOX AND REMOVE IT FROM THE QUEUE 
INPUTS : 

ADDRESSEE: POINTER TO THE MAILBOX FROM WHICH A MESSAGE IS 

TO BE RECEIVED. 
PROCEDURES CALLED: 

WAIT, SIGNAL. 
OUTPUTS: 

M : A POINTER TO THE RECEIVED MESSAGE. 
EXCEPTIONS : 

THE PROCESS IS SUSPENDED UNTIL A MESSAGE IS ENTERED INTO THE 
QUEUE IF NONE EXIST AT CALL TIME. 
HISTORY: 

04/08/79: ORIGINAL. 



BEGIN 

WITH ADDRESSEES DO BEGIN 
WAIT ( MAILPRESENT ) ; 
WAIT ( MUTEX ) ; 
M := MSGHEAD; 
IP MSGTAIL = MSGHEAD 

THEN MSGTAIL := NIL; 
MSGHEAD := M@ .NEXTMSG; 
SIGNAL ( MUTEX ) ; 
END; (* WITH ADDRESSEES *) 
END; (* RCVMSG *) 



PROCEDURE DELMSG 

* 



(* M : MSGPTR ; ADDRESSEE : MBPTR *) ; 



4 ( 

4 PURPOSE: 

4 DELETE A MESSAGE FROM A MAILBOX QUEUE. 

4 INPUTS: 

4 M : POINTER TO THE MESSAGE TO BE DELETED. 

4 ADDRESSEE : POINTER TO THE MAILBOX CONTAINING THE QUEUE 

4 FROM WHICH THE MESSAGE IS TO BE DELETED. 

4 PROCEDURES CALLED: 

4 WAIT, SIGNAL. 

4 OUTPUTS: 

4 NONE. 

4 EXCEPTIONS: 

4 NONE . 

4 HISTORY: 
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4 
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5 
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9 
10 
12 
13 
14 
15 
16 
16 
16 
17 
18 
19 
19 
19 
1 
1 
1 



04/08/79: ORIGINAL. 
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VAR 

LAST : MSGPTR; 
FOUND : BOOLEAN; 

BEGIN 

POUND := FALSE; 
WITH ADDRESSEES DO BEGIN 
WAIT ( MUTEX ) ; 
IF MSGHEAD = M 
THEN BEGIN 

MSGHEAD := M@.NEXTMSG; 
FOUND := TRUE; 
END (* IF MSGHEAD THEN *) 
ELSE BEGIN 

LAST := MSGHEAD; 

WHILE LAST <> NIL AND LAST@ .NEXTMSG <> M 

DO LAST := LAST§.NEXTMSG; 
IF LASTONIL THEN BEGIN; 

LASTQ.NEXTMSG := M@.NEXTMSG; 
FOUND := TRUE; 
IF LAST@.NEXTMSG = NIL 
THEN MSGTAIL := LAST; 
END; (* IF LAST *) ; 
END; (* IF MSGHEAD ELSE *) 
IF FOUND 

THEN WAIT ( MAILPRESENT ) ; 
SIGNAL ( MUTEX ) 
END; (* WITH ADDRESSEES *) 
END; (* DELMSG *) 

BEGIN (* MAILBOXES *) 

(* NULLBODY *) 
END. (* MAILBOXES *) 
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CONCLUSION 



The software tools discussed in this document provide interprocess 
scheduling and coordination of system resources in the Executive 
Run-Time Environment. While simple in terms of language constructs # 
these tools provide a sophistication in capability that enables a 
higher productivity in the real-time programming environment. Further 
information on these and other components of the Microprocessor Pascal 
System can be obtained in the Microprocessor Pascal System User'^s 
Guide and the TMS9900 Family Software Development Handbook. 
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